home *** CD-ROM | disk | FTP | other *** search
/ Merciful 2 / Merciful - Disc 2.iso / software / h / highspeedpascalv2.0b.dms / highspeedpascalv2.0b.adf / Interface / Potgo.pas < prev    next >
Pascal/Delphi Source File  |  1992-01-16  |  290b  |  27 lines

  1. Unit Potgo;
  2.  
  3. Interface
  4. Uses Exec;
  5.  
  6. Type
  7.   pLibrary = ^tLibrary;
  8.  
  9.  
  10. Var
  11.   PotgoBase: pLibrary;
  12.  
  13.  
  14. Const
  15.   POTGONAME = 'potgo.resource';
  16.  
  17.  
  18. Function AllocPotBits (bits: Integer): Integer;
  19. Procedure FreePotBits (bits: Integer);
  20. Procedure WritePotgo
  21.          (word: Integer;
  22.           mask: Integer);
  23.  
  24.  
  25.  
  26. End.
  27.